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BusinessLayer 

// BusinessLayer.cpp : implementation of CBusinessLayer 

include "stdafx.h* 

#i ncl ude "1 ayerimpl - h" 

#i ncl ude "pusinessLayer.h" 

#include "process .h" 

class layerthread : public threadFunctor 
public: 

void startThreadC) 

COMlnitalizer init; 
try 

handlerO; 

catch(.. .) 

{ 
} 

nuthreadhandle = Null; 

void handlerO 
{ 

long threshold; 

long nextchapterrime; 

CTime startEvent; 

crime stopEvent; 

crime time; 

long eventLength; 

char msg[256]; 



*>0n_tParam) ; 



: :outputDebugstring("\n Loop started\n"); 
CBusinessLayer *pLayer = reinterpret_cast<CBusinessLayer 

if (puayer) 

try 



time ^ crime: :GetCurrentTi me O ; 
pLayer->get_th reshol d C&th reshol d) ; 
long timeoata; 

pLayer->get_startEvent(&timeData) ; 
startEvent = timeoata; 
pLayer->get_stopEventC&timeDaTa> ; 
stopEvent - timeoata; 

eventLength - crimespan (stopEvent - 
startEvent). GetTotal seconds O * 1000; 

sprinrfCmsg, "BsNn", startEvent. Format C%0 r %H :SKM")) ; 
: zOutputDefiugstringCmsg) ; 

sprintfOnsg, "%s\n tt , stopEvent. Format( ,f #D:%H:56M'')); 
: :0uTputDe6ugstnngcmsg) : 

pLayer->put_5erverTimeCtnrne.Get-rimeO p-1, -1 ,0, 

if (startEvent < stopEvent && 

Ctime + crimespan (threshold)) >= startEvent) 

i // 

// - Determine if it is time to kick-off the 

// - If it is, stop the loop. 
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eventLength) ; 



event. 
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BusinessLayer 

// - If it is not, go to sleep and check 

after 500 milliseconds 

„J)str_T dvdCmd = pLayer->firstdvdCmd() ; 
std:: string debugmsg; 

debugmsg = "first dvd command" + dvdCmd + 

"\n"; 

: :outputDebugstring(debugmsg.c_str()) i 
while (time < startEvent ) 

checkcancel O ; 
Sleep (500); 

time - crime: :GetCurrentm" me O ; 
pLayer->put_serverrimeCtime-GetTimeO|-l, -1 ,0, eventLength) ; 

if (time <= (startEvent + crimespan(l))) 
pLayer->sendCommand(dvdcmd> ; 
: :OutputDebugString("Process 

Event"); 

} 

while (time < stop Event) 

B5TR command; 

cri mespan 1 apse dTi me (0) ; 

long title, chapter; 

if (time > startEvent) 

lapsedTime = time - 

startEvent? 

} 

if 

(s ucc eeded (pLay e r->GetN ext Pai r (fcnextchapt e rri me , &t i tl e , &ch apt e r p ficomman d) ) ) 
(lapsedTi me. GetTotal Seconds () < nextchapterrime) 

{ . 

while(lapsedTime.GetTotalSecondsO <= nextChapterTime) 

I 

checkCancel Q ; 
crime: :GetCurrentTime() ; 



Sleep (500); 
time = 



lapsedTime 

time - startEvent; 

pLayer->updateTime(lapsedTime.GetTotalsecondsO , title) ; 

pLayer^put.serverTime^ime.GetTimeO ptitle, chapter .lapsetfri me -Getrrotal seconds () 
1000, eventLength) ; 
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pLayer-*sendCommand(command) ; 
cri me : : Getcu r rentrl me O ; 

the chapter table"); 



Business Layer 



} 

else 
I 



} 

time = 



sleep(500); 



: :sysFreeString(command) ; 

TRACE C" no more entries in 
break; 



: :outputDebugstring("End Session"); 
pi_ayer->endSessionCNULL) ; 

catch CExceptioncanceled * pExcp) 

delete pExcp; 

_bstr_t msg = "Cancellation occured"; 
pLayer->endSe5sion(msg) ; 

catch ( ) 

_bstr_t msg = "Cancellation occured"; 
pLayer->endsession(msg) ; 



}; 

/J/////////////////////////////////////////////////////////////////////////// 
// cbusi nes s Layer . 

STDMETHODIMP cbusi nessLayer: :lnterface5upportsErrorlnfo(R£FIlD riid) 

static const IID* arr[] = 

&iiD_IBusi nessLayer 

for Cint i=0; i < sizeof(arr) / sizeof (arr[0]) ; i++) 

if (inlineIsEqualqun>(*arr[i] , riid)) 
return 5UOK; 

return S^FALSE; 

} 

h RESULT CBu si nessLayer: : Final construct Q 



HRESULT hr = cocreatexnstanceCCLSlD_CConfigMgrirnpl , 
HD_JCC0hfi gMgrlmpl , 
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0, 

CLSCTX-ALL, 



PAGE 20/26 ' RCVD AT 4/12/2005 9:17:42 PM [Eastern Daylight Time] * SVR:USPT0-EFXRF-1/fl * DNIS:87293Q6 * CSID:8585520095 * DURATION (mm-ss);05-58 



04/12/05 18:22 FAI 8585520095 



@021 



BusinessLayer 

(void**)&in_plCConfigMgrIrnpl) ; 
return hr: 

void CBusinessLayer: : Final Rel ease O 

if Cm_pthread) 

m_pthread->stopQ ; 
delete nupthread; 
if Cm_piCCOnfigMgrImpl) 

m_plCConfigMgrimpl ->Rel ease() ; 

try 
{ 

if CnuplDBConnect) 

m_piDBConnect->Rel easeO ; 

catch C ) 

{ 

> } 

void CBusinesstayer: :ChkVa1idEvent() 

: :outputDebugstring("\n check valid Event\n"); 

nufirsrrime = false? 

if Cm_diskiD. length O = 0) 

throw new lAUserExcepti on ("Invalid Disk id"}; 

if (nuplCConfigMgrlmpI) 

std: .-string debugmsg: 

debugmsg = "disk id= + m_diskiD + location id = " + m_1ocationro 

+ "\n"; 

: : out pu toebugst ri ng (debugmsg . cus t rQ); 

nL_plCConfigMgrlmpl->put_diskiD(m w diskID) ; // 
variable used for search critera 

m_plcconfigMgrimpl->put_locationiDCnulocationlD); // Variable used 
for search critera 

m_picconf i gMgrlmpl ->getJiosrrype C&mJiostType) ; 

if On_hostType) 
// 

// Create a DBConnector, store the pointer for future use. 
// store values from db. 

: :outputDebugstringC\n Host type is checked\n"); 
H RESULT hr - SUOK; 
if (lltUPIDBConnect) 

hr = CoCreateinstanceCCLSIO_DB_Connector, 

0, 

HD_iDB_connector , 
(void**)&rupIDBConnect) ; 

if (SUCCEEDED (hr)) 
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variable used for search critera 

J 

variable used for search critera 



BusinessLayer 
: :OutputDebugStringC"\n Initialize DB Connector\i 
nupIDBConnect->put-di skID(rrudi skID) ; 

W_.plDBConnect->put_l ocationlD(mJl ocationlD) ; // 

m_pIDBCannect->chkEventO ; 
BSTR data; 
m_pIDBConnect->get_di5klD(&data} ; 
if (data) 

rrudisklD = data; 

: :sysFreestring(data) ; 

m_piDBConnect->get_locationiDC&data) ; 
it (data) 

mJIocationlD = data; 
: :sys Freest ring (data); 

long time; 

m_piDBConnect->get_startEventC&time) \ 
m-start Event = time; 
m_plDBConnect->get_stopEventC&time) ; 
m_stopEvent = tirae; 

nt-pIDBConn ect->get^th r esol d (&th reshol d) ; 
m_pIDBConnect->get_hostTypeC&m-hostType); 

long * nDecoderArray; 

long * nCapabilitiesArray ; 

nDecoderArray = nCapabilitiesArray = NULL; 

if 

CsuccEEDEDCnupiDBConnect-^ecoderArrayC&nDecoderArray, fincapabilitiesArray))) 

int i = 0; 

whileCnDecoderArray[i] !^ -10 

m_capabilities[nDecoderArray[i]] 



nCapabilitiesArray[1] ; 



CoTaskMemFree(nDecoderArray) ; 
CoTaskMemFreeCnCapabilitiesArray) ; 



else 
{ 



: soutputDebugstringC'Xn Prepare to start thread\n"); 

m_pthread = new layerthread; 
nupthread->start Ctni s r f al se) ; 



throw new COMException(hr) ; 



future use. 



else 
{ 



Yf Create a Reference Connector, and store the pointer for 
Page 5 



// TBD 
// 
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bust nessLayer 



stdmethodimp eBusiness Layer : :get_disk(BSTR* pval) 

// TODO: Add your implementation code here 
*pVal = m_di skid. copy ( 5; 
return S_OK: 

} 

stdmethodimp causi nessLayer : : put_di sk(BSTR newval) 

// todo: Add your implementation code here 
m_disklD = newval; 
return S_OK; 

STDMETHODIMP CBusi ness Layer : :getJ]ocation(BSTR* pval) 

// TODO: Add your implementation code here 
*pVal = m_di skid. copy C ) ; 
return S_OK; 

stdmethodimp csusi ness Layer : :put_location(BSTR newval) 

// todo: Add your implementation code here 
m_locationiD = newval; 

return s_ok; 

stdmethodimp CBusi nessLayer: :ge"LstartEventClong *pval) 
// TODO: Add your implementation code here 

*pval = nustartEvent-GetTimeO; // m_plDBConnect->get_startEvent(pval); 
return 5LQK; 

STDMETHODIMP CBusi nessLayer : :put_startEvent(long newval) 

f( TODO: Add your implementation code here 
time_t time « newval; 
nustart Event time; 
return s_OK; 

STDMETHODIMP CBusi ness Layer : :get_stopEventOong *pVal) 
// TODO: Add your implementation code here 

*pval = nustopEvent.GetTimeO : // m_piDBConnect->get__startEvent(pvai;); 
return s_OK; 

STDMETHODIMP CBusi nessLayer: :put_stopEvent(long newVal) 

// todo: Add your implementation code here 
time_t time ?= newval; 
m_stopEvent - time; 
return Su.OK; 
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STDMETHODIM* CBusinessLayer : : get_threshold(long *pval) 

// TODO: Add your implemenxation code here 

*pval = threshold; // m_plDBConnect»get_thresold(pVal) ; 

return Sl_ok; 



STDMETHODIMP CBusinessLayer: :put_t hres hold (long newval) 

// todo: Add your implementation code here 
threshold = newval; 
return s_ok; 



h result CBusinessLayer: :GetNext Pair (long *theTime, long *nTitle, long * nchapter, 
bStr *chaptercmnd) 

r et u rn m_plDBConnect->get_Nextchapter ( theTi me , nTi tl e , nchapter , chap t eronnd) ; 



_bstr_t CBusinessLayer: :fi rstdvdondC) 

^/f Execute the first DVD command 
// 

bstr msg = null; 
J3str_t dvdMsg; 

nfL_piDBConnect->get_i ni ti alDVDCommandC&msg) ; 
if (msg) 

dvdMsg = msg; 
return dvdMsg; 

void CBusinessLayer: ; sen dcommand (BSTR szMsg) 
Fi re_sendCommand(s2Msg) ; 



void CBusinessLayer: :endsessi on Cbstr szMsg) 
Fi re_endsession(szMsg) ; 

void CBusinessLayer: :updateTime(LONG time, long nTitle) 
Fi re_updatetime(time, nTitl e) \ 

STDMETHODIMP CBusinessLayer : : mi rial izeO 
I 

HRESULT hr = S_OK; 

try 

{ 

chkvalidEventO; 
catchClAUserException *pexcpt) 
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bust nessLayer 

delete pexcpt; 
hr ^ E_FAIL; 

_bstr_t msg = "user exception occured\n ; 
Ft re_endsessian(msg) ; 

catch CCOMEXcepti on * pcomexcpt) 

* hr - pcomexcpt->operator hresultQ; it bi 

_bstr_t msg = "com exception occured\n ; 
Fi re_endSession(msg) ; 



} 

catch C- 
{ 



J>str_t msg = "unknown exception occured\n"; 
Fi reL_endSession(msg) ; 



} 

return hr; 

STDMETHODIMP eBusiness Layer: :TranslateTimePlay(long nDecoderType, long nTitle, long 
nTime, B5TR *SZCmd) 

// tooo: Add your implementation code here 
H RESULT hr = EL_FAIL; 

decodercapabilities::iterator it = m_capabilities.find(nDecoderrype); 
if Cit J= m_capabi li ties, end O) 

* if ((*it). second O) 

char translate[_MAX_PATH]; 

sprintf (translate, "tmp:#d:5&r, nTitle, nTime * 1000); 
*szCmd - _bst r_t (translate), copy O; 
hr = S_Ok; 

} 

} 

return hr; 

} 

STDMETHODIMP eBusiness Layer : : get_eventLengthOong *pval) 

// todo: Add your implementation code here 

nutimeLock, lockO ; 

*pval = m_eventLength.GetTime(); 

mjtimeLock.unlockO ; 

return S_Ok; 

} 

STDMETHODIMP CBusinessLayer: : get_l apsecfTimeOong *pVal) 

// TODO: Add your implementation code here 

m_timeLock.lockO ; 

*pval = m_lapsedTime.GetTimeO; 

nuti meLock . unl ockO ; 

return s_ok; 

Page S 



PAGE 25/26 • RCVD AT 4/1212005 9:17:42 PM [Eastern Daylight Time] ' SVR:USPTO-EFXRF-1/0 • DNIS:8729306 * C SID:858552 0095 " DURATION (mm-ss):05-58 



.04/12/05 18:23 FAX 8585520095 



@026 



Busi nessLayer 

STDM^THODIMP CBusinessLayer: :get_chapterproperties(long *pval) 

* // TODO: Add your implementation code here 

m_t i meLock. lock O ; 
*pval = tn_chapter: 
m_ti meLock - urn ockQ > 
return S_OK; 

} 



STDMETHODJMP CBusi ness Layer : :get_titleproperties (long *pval) 

^ // TODO: Add your implementation code here 

nut i meLock. Toe k() ; 
*pval = rrutitle; 
nuci meLock. unlockO ; 
return S_OK; 

} 



STDMCTHOpimp CBusi ness Layer : :get_serverri me (long *pva*l) 

* // TODO: Add your implementation code here 

m_ti meLock -lockO ; 
*pVal m_$erverTiroe.GetTimeO; 
if C*pval = 0) 

char msg[1024]; 

sprintfOnsg, "title - 3&L chapter = %d. location = Ss^nL-title, 
m_chapter, mJocationlD. operator char *Q); 
} 

m_ti meLock. unl ock() ; 
return SJOK; 

void CBusinessLayer: :put_serverTimeCy*[in]*/ long serverTime, long title, long 
chapter, long lapsedTime, long length) 

nutimeLock.lockO; 
nL_serverTime = serverTime; 
m_title = title; 
m_chapter = chapter; 
nulapsedTime = lapsedTime; 
m_eventLength = length; 
ituti meLock . unl ock C) ; 

} 
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